home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / stk-3.002 / stk-3 / STk-3.1 / Contrib / STk-wtour / lessons / text3.stk < prev    next >
Encoding:
Text File  |  1994-08-24  |  224 b   |  7 lines
  1. ;;;  A basic text widget, with word wrapping
  2.  
  3. (pack (text '.text :wrap "word"))
  4.  
  5. (.text 'insert "current" "This is a text widget, displaying some text. ")
  6. (.text 'insert "current" "Notice how lines are broken at words.\n")
  7.